home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 42 / Amiga Format AFCD42 (Issue 126, Aug 1999).iso / -serious- / hardware / ioblix12usr379 / install_parallel_module < prev    next >
Text File  |  1999-05-14  |  8KB  |  285 lines
  1. ;
  2. ; $VER: IOBlix1200 installation 1.4 (9.11.98)
  3. ;
  4. ; Copyright (c) 1998 Thore Böckelmann and RBM Computertechnik
  5. ;
  6.  
  7. ;****************************************************************************
  8. ;
  9. ; English texts
  10. ;
  11. (if (not (= @language "deutsch"))
  12.     (
  13.         (set #bad-kick      "You must have AmigaOS 2.0 (V37) or newer to be able to use the IOBlix1200 I/O board.")
  14.         (set #bad-cpu       "You must have at least an MC68020 to use the IOBlix1200 software.")
  15.         (set #noparmodule   (cat "You have no IOBlix1200 parallel module installed! "
  16.                                  "Please install the module first, before you install the software!"))
  17.         (set #selectdevs    "\nWhere to install the device drivers?\n")
  18.         (set #selectl       "\nWhere to install the IOBlix-Handler?\n")
  19.         (set #selecttool    "\nWhere to install the additional tools?\n")
  20.         (set #copypardev    "\nCopying ioblix12par.device...\n")
  21.         (set #copyzipdev    "\nCopying ioblix12zip.device...\n")
  22.         (set #copyhandler   "\nCopying IOBlix-Handler...\n")
  23.         (set #copydosdriver "\nCopying DOSDrivers...\n")
  24.         (set #copytools     "\nCopying Tools...\n")
  25.         (set #createtest    "\nCreating \"Test_Board\" script...\n")
  26.         (set #ssmodify      "\nAdding some command to S:User-Startup...\n")
  27.         (set #toolsource    "C/english")
  28.         (set #nsdinfo       (cat "\n"
  29.                                  "\n"
  30.                                  "If don't want to use IOBlix' own drivers SERxx: and PARxx: "
  31.                                  "but the original drivers instead, then you also have to install the NSDPatch software!\n"
  32.                                  "\n"
  33.                                  "NSDPatch can be found in the drawer \"Goodies\""))
  34.         (set #zipquery      (cat "Do want to install drivers for a "
  35.                                  "parallel port ZIP drive?"))
  36.         (set #zipstart      "Do you want the ZIP driver to be started on bootup?")
  37.         (set #zipinfo       (cat "The driver PZIP0: is meant for FFS formatted ZIP disks with 512 bytes blocksize,\n"
  38.                                  "and the driver PZIPC: is meant for PC formatted ZIP disks. This requires CrossDOS to be installed."))
  39.     )
  40. )
  41.  
  42. ;****************************************************************************
  43. ;
  44. ; Deutsche Texte
  45. ;
  46. (if (= @language "deutsch")
  47.     (
  48.         (set #bad-kick      "Sie müssen AmigaOS 2.0 (V37) oder höher installieren, um die IOBlix1200-Karte zu benutzen.")
  49.         (set #bad-cpu       "Sie brauchen mindestens einen MC68020, um die IOBlix1200-Software zu benutzen.")
  50.         (set #noparmodule   (cat "Sie haben kein IOBlix1200 Parallel-Modul in Ihrem Rechner installiert! "
  51.                                  "Bitte bauen Sie erst das Modul ein, bevor Sie die Software installieren!"))
  52.         (set #selectdevs    "\nWohin sollen die Gerätetreiber kopiert werden?\n")
  53.         (set #selectl       "\nWohin soll der IOBlix-Handler kopiert werden?\n")
  54.         (set #selecttool    "\nWohin sollen die Zusatzprogramme kopiert werden?\n")
  55.         (set #copypardev    "\nKopiere ioblix12par.device...\n")
  56.         (set #copyzipdev    "\nKopiere ioblix12zip.device...\n")
  57.         (set #copyhandler   "\nKopiere IOBlix-Handler...\n")
  58.         (set #copydosdriver "\nKopiere DOSDrivers...\n")
  59.         (set #copytools     "\nKopiere Zusatzprogramme...\n")
  60.         (set #createtest    "\nErstelle \"Test_Board\" Skript...\n")
  61.         (set #ssmodify      "\nFüge Befehle in S:User-Startup ein...\n")
  62.         (set #toolsource    "C/deutsch")
  63.         (set #nsdinfo       (cat "\n"
  64.                                  "\n"
  65.                                  "Wenn Sie statt der IOBlix-eigenen Treibern SERxx: und PARxx: "
  66.                                  "lieber weiterhin die originalen Treiber benutzen wollen, dann müssen Sie noch die NSDPatch-Software installieren!\n"
  67.                                  "\n"
  68.                                  "NSDPatch finden Sie in der Schublade \"Goodies\""))
  69.         (set #zipquery      (cat "\n"
  70.                                  "Wollen Sie Treiber für ein Parallel-Port ZIP Laufwerk installieren?"))
  71.         (set #zipstart      "Soll der ZIP Treiber gleich beim Booten gestartet werden?")
  72.         (set #zipinfo       (cat "Der Treiber PZIP0: ist für FFS-formatierte ZIP-Medien mit einer Blockgröße von 512 Bytes gedacht,\n"
  73.                                  "und der Treiber PZIPC: for PC-formatierte ZIP-Medien. Dafür muß CrossDOS installiert sein."))
  74.     )
  75. )
  76.  
  77. ;****************************************************************************
  78. ;
  79. ; Setup
  80. ;
  81.  
  82. (complete 0)
  83.  
  84. (if (< (/ (getversion) 65536) 37)
  85.     (abort #bad-kick)
  86. )
  87.  
  88. (if (patmatch "68000|68010" (database "cpu"))
  89.     (abort #bad-cpu)
  90. )
  91.  
  92. ;****************************************************************************
  93. ;
  94. ; Welcome
  95. ;
  96.  
  97. (welcome)
  98.  
  99. (complete 10)
  100.  
  101. ;****************************************************************************
  102. ;
  103. ; Check for IOBlix module
  104. ;
  105.  
  106. (run "IOBlix1200-Install:C/english/SetupIOBlix reinit a1200 par" (safe))
  107. (if
  108.     (= 0
  109.         (run "IOBlix1200-Install:C/Look4IOBlix a1200 par" (safe))
  110.     )
  111.     (abort #noparmodule)
  112. )
  113.  
  114. (complete 20)
  115.  
  116. ;****************************************************************************
  117. ;
  118. ; Setup directory
  119. ;
  120.  
  121. (set #destdevs
  122.     (askdir
  123.         (prompt #selectdevs)
  124.         (help @askdir-help)
  125.         (default "DEVS:")
  126.     )
  127. )
  128.  
  129. (set #destl
  130.     (askdir
  131.         (prompt #selectl)
  132.         (help @askdir-help)
  133.         (default "L:")
  134.     )
  135. )
  136.  
  137. (set #desttool
  138.     (askdir
  139.         (prompt #selecttool)
  140.         (help @askdir-help)
  141.         (default "SYS:IOBlix")
  142.         (newpath)
  143.     )
  144. )
  145.  
  146. (set @default-dest #desttool)
  147.  
  148. (complete 20)
  149.  
  150. (makedir #desttool
  151.     (prompt "")
  152.     (help @makedir-help)
  153.     (infos)
  154. )
  155.  
  156. (complete 30)
  157.  
  158. (set #installzip
  159.     (askbool
  160.         (prompt #zipquery)
  161.         (help @askbool-help)
  162.         (default 1)
  163.     )
  164. )
  165.  
  166. ;****************************************************************************
  167. ;
  168. ; Install devices
  169. ;
  170.  
  171. (copylib
  172.     (help @copylib-help)
  173.     (prompt #copypardev)
  174.     (source "devs/ioblix12par.device")
  175.     (dest #destdevs)
  176.     (confirm)
  177. )
  178.  
  179. (copylib
  180.     (help @copylib-help)
  181.     (prompt #copyhandler)
  182.     (source "l/IOBlix-Handler")
  183.     (dest #destl)
  184.     (confirm)
  185. )
  186.  
  187. (copyfiles
  188.     (help @copyfiles-help)
  189.     (prompt #copydosdriver)
  190.     (source "DEVS/DOSDrivers")
  191.     (choices "PAR00" "PAR01")
  192.     (dest "SYS:Storage/DOSDrivers")
  193.     (infos)
  194.     (confirm)
  195. )
  196.  
  197. (complete 40)
  198.  
  199. ;****************************************************************************
  200. ;
  201. ; Install tools
  202. ;
  203.  
  204. (copyfiles
  205.   (help @copyfiles-help)
  206.   (prompt #copytools)
  207.   (source #toolsource)
  208.   (choices "SetupIOBlix" "QueryIOBlix")
  209.   (dest #desttool)
  210.   (confirm)
  211. )
  212.  
  213. (startup "IOBlix I/O Board"
  214.   (help @startup-help)
  215.   (prompt #ssmodify)
  216.   (command (cat (tackon #desttool "SetupIOBlix") " a1200 par >NIL:"))
  217. )
  218.  
  219. (complete 60)
  220.  
  221. (copyfiles
  222.   (help @copyfiles-help)
  223.   (prompt #createtest)
  224.   (dest #desttool)
  225.   (source "Test_Board")
  226.   (infos)
  227. )
  228.  
  229. (textfile
  230.   (dest (tackon #desttool "Test_Board"))
  231.   (prompt #createtest)
  232.   (help "")
  233.   (append (tackon #desttool "QueryIOBlix >t:queryioblix{$$}\n"))
  234.   (append "more t:queryioblix{$$}\n")
  235.   (append "delete t:queryioblix{$$} >nil:\n")
  236. )
  237.  
  238. ;****************************************************************************
  239. ;
  240. ; Install parallel ZIP driver
  241. ;
  242.  
  243. (if (= #installzip 1)
  244.     (
  245.         (copylib
  246.             (help @copylib-help)
  247.             (prompt #copyzipdev)
  248.             (source "devs/ioblix12zip.device")
  249.             (dest #destdevs)
  250.             (confirm)
  251.         )
  252.  
  253.         (copyfiles
  254.             (help @copyfiles-help)
  255.             (prompt #copydosdriver)
  256.             (source "DEVS/DOSDrivers")
  257.             (choices "PZIP0" "PZIPC")
  258.             (dest "SYS:Storage/DOSDrivers")
  259.             (infos)
  260.             (confirm)
  261.         )
  262.  
  263.         (startup "IOBlix1200 ZIP driver"
  264.             (help @startup-help)
  265.             (prompt #zipstart)
  266.             (command "mount PZIP0: >nil:")
  267.         )
  268.  
  269.         (message #zipinfo)
  270.     )
  271. )
  272.  
  273. (complete 80)
  274.  
  275. (message #nsdinfo)
  276.  
  277. ;****************************************************************************
  278. ;
  279. ; Exit
  280. ;
  281.  
  282. (complete 100)
  283. (exit)
  284.  
  285.